home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 July: Mac OS SDK / Dev.CD Jul 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Interfaces / PInterfaces / GestaltEqu.p < prev    next >
Encoding:
Text File  |  1996-05-03  |  32.1 KB  |  799 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        GestaltEqu.p
  3.  
  4.      Contains:    Gestalt Interfaces.
  5.  
  6.      Version:    Technology:    System 7.5
  7.                  Package:    Universal Interfaces 2.1.2 on ETO #20
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs@applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. }
  19.  
  20. {$IFC UNDEFINED UsingIncludes}
  21. {$SETC UsingIncludes := 0}
  22. {$ENDC}
  23.  
  24. {$IFC NOT UsingIncludes}
  25.  UNIT GestaltEqu;
  26.  INTERFACE
  27. {$ENDC}
  28.  
  29. {$IFC UNDEFINED __GESTALTEQU__}
  30. {$SETC __GESTALTEQU__ := 1}
  31.  
  32. {$I+}
  33. {$SETC GestaltEquIncludes := UsingIncludes}
  34. {$SETC UsingIncludes := 1}
  35.  
  36.  
  37. {$IFC UNDEFINED __TYPES__}
  38. {$I Types.p}
  39. {$ENDC}
  40. {    ConditionalMacros.p                                            }
  41.  
  42. {$IFC UNDEFINED __MIXEDMODE__}
  43. {$I MixedMode.p}
  44. {$ENDC}
  45.  
  46. {$PUSH}
  47. {$ALIGN MAC68K}
  48. {$LibExport+}
  49.  
  50. CONST
  51.     gestaltAddressingModeAttr    = 'addr';                        { addressing mode attributes }
  52.     gestalt32BitAddressing        = 0;                            { using 32-bit addressing mode }
  53.     gestalt32BitSysZone            = 1;                            { 32-bit compatible system zone }
  54.     gestalt32BitCapable            = 2;                            { Machine is 32-bit capable }
  55.  
  56.     gestaltAliasMgrAttr            = 'alis';                        { Alias Mgr Attributes }
  57.     gestaltAliasMgrPresent        = 0;                            { True if the Alias Mgr is present }
  58.     gestaltAliasMgrSupportsRemoteAppletalk = 1;                    { True if the Alias Mgr knows about Remote Appletalk }
  59.  
  60.     gestaltAppleTalkVersion        = 'atlk';
  61.  
  62.     gestaltAUXVersion            = 'a/ux';
  63.  
  64.     gestaltCloseViewAttr        = 'BSDa';                        { CloseView attributes }
  65.     gestaltCloseViewEnabled        = 0;                            { Closeview enabled (dynamic bit - returns current state) }
  66.     gestaltCloseViewDisplayMgrFriendly = 1;                        { Closeview compatible with Display Manager (FUTURE) }
  67.  
  68.     gestaltCFMAttr                = 'cfrg';                        { returns information about the Code Fragment Manager }
  69.     gestaltCFMPresent            = 0;                            { true if the Code Fragment Manager is present }
  70.  
  71.     gestaltColorMatchingAttr    = 'cmta';                        { ColorSync attributes }
  72.     gestaltHighLevelMatching    = 0;
  73.     gestaltColorMatchingLibLoaded = 1;
  74.  
  75.     gestaltColorMatchingVersion    = 'cmtc';
  76.     gestaltColorSync10            = $0100;                        { 0x0100 & 0x0110 _Gestalt versions for 1.0-1.0.3 product }
  77.     gestaltColorSync11            = $0110;                        {   0x0100 == low-level matching only }
  78.     gestaltColorSync104            = $0104;                        { Real version, by popular demand }
  79.     gestaltColorSync105            = $0105;
  80.  
  81.     gestaltConnMgrAttr            = 'conn';                        { connection mgr attributes    }
  82.     gestaltConnMgrPresent        = 0;
  83.     gestaltConnMgrCMSearchFix    = 1;                            { Fix to CMAddSearch?     }
  84.     gestaltConnMgrErrorString    = 2;                            { has CMGetErrorString() }
  85.     gestaltConnMgrMultiAsyncIO    = 3;                            { CMNewIOPB, CMDisposeIOPB, CMPBRead, CMPBWrite, CMPBIOKill }
  86.  
  87.     gestaltComponentMgr            = 'cpnt';
  88.  
  89.     gestaltColorPickerVersion    = 'cpkr';                        { returns version of ColorPicker }
  90.     gestaltColorPicker            = 'cpkr';
  91.  
  92. {
  93.     The gestaltNativeCPUtype ('cput') selector can be used to determine the
  94.     native CPU type for all Macs running System 7.5 or later.
  95.     
  96.     The 'cput' selector is not available when running System 7.0 (or earlier)
  97.     on most 68K machines.  If 'cput' is not available, then the 'proc' selector
  98.     should be used to determine the processor type.
  99.     
  100.     An application should always try the 'cput' selector first.  This is because,
  101.     on PowerPC machines, the 'proc' selector will reflect the CPU type of the
  102.     emulator's "virtual processor" rather than the native CPU type.
  103.     
  104.     The values specified below are accurate.  Prior versions of the Gestalt
  105.     interface file contained values that were off by one.
  106.     
  107.     The Quadra 840AV and the Quadra 660AV contain a bug in the ROM code that
  108.     causes the 'cput' selector to respond with the value 5.  This behavior
  109.     occurs only when running System 7.1.  System 7.5 fixes the bug by replacing
  110.     the faulty 'cput' selector function with the correct one.
  111. }
  112.     gestaltNativeCPUtype        = 'cput';                        {  Native CPU type                                        }
  113.     gestaltCPU68000                = 0;                            {  Various 68k CPUs...      }
  114.     gestaltCPU68010                = 1;
  115.     gestaltCPU68020                = 2;
  116.     gestaltCPU68030                = 3;
  117.     gestaltCPU68040                = 4;
  118.     gestaltCPU601                = $0101;                        {  IBM 601                                                  }
  119.     gestaltCPU603                = $0103;
  120.     gestaltCPU604                = $0104;
  121.     gestaltCPU603e                = $0106;
  122.  
  123.     gestaltCRMAttr                = 'crm ';                        { comm resource mgr attributes }
  124.     gestaltCRMPresent            = 0;
  125.     gestaltCRMPersistentFix        = 1;                            { fix for persistent tools }
  126.     gestaltCRMToolRsrcCalls        = 2;                            { has CRMGetToolResource/ReleaseToolResource }
  127.  
  128.     gestaltControlStripVersion    = 'csvr';
  129.  
  130.     gestaltCTBVersion            = 'ctbv';
  131.  
  132.     gestaltDBAccessMgrAttr        = 'dbac';                        { Database Access Mgr attributes }
  133.     gestaltDBAccessMgrPresent    = 0;                            { True if Database Access Mgr present }
  134.  
  135.     gestaltDictionaryMgrAttr    = 'dict';                        { Dictionary Manager attributes }
  136.     gestaltDictionaryMgrPresent    = 0;                            { Dictionary Manager attributes }
  137.  
  138.     gestaltDITLExtAttr            = 'ditl';                        { AppenDITL, etc. calls from CTB }
  139.     gestaltDITLExtPresent        = 0;                            { True if calls are present }
  140.  
  141.     gestaltDisplayMgrAttr        = 'dply';                        { Display Manager attributes }
  142.     gestaltDisplayMgrPresent    = 0;                            { True if Display Mgr is present }
  143.     gestaltDisplayMgrCanSwitchMirrored = 2;                        { True if Display Mgr can switch modes on mirrored displays }
  144.     gestaltDisplayMgrSetDepthNotifies = 3;                        { True SetDepth generates displays mgr notification }
  145.  
  146.     gestaltDisplayMgrVers        = 'dplv';
  147.  
  148.     gestaltDragMgrAttr            = 'drag';                        { Drag Manager attributes }
  149.     gestaltDragMgrPresent        = 0;                            { Drag Manager is present }
  150.     gestaltDragMgrFloatingWind    = 1;                            { Drag Manager supports floating windows }
  151.     gestaltPPCDragLibPresent    = 2;                            { Drag Manager PPC DragLib is present }
  152.  
  153.     gestaltEasyAccessAttr        = 'easy';                        { Easy Access attributes }
  154.     gestaltEasyAccessOff        = 0;                            { if Easy Access present, but off (no icon) }
  155.     gestaltEasyAccessOn            = 1;                            { if Easy Access "On" }
  156.     gestaltEasyAccessSticky        = 2;                            { if Easy Access "Sticky" }
  157.     gestaltEasyAccessLocked        = 3;                            { if Easy Access "Locked" }
  158.  
  159.     gestaltEditionMgrAttr        = 'edtn';                        { Edition Mgr attributes }
  160.     gestaltEditionMgrPresent    = 0;                            { True if Edition Mgr present }
  161.     gestaltEditionMgrTranslationAware = 1;                        { True if edition manager is translation manager aware }
  162.  
  163.     gestaltAppleEventsAttr        = 'evnt';                        { Apple Events attributes }
  164.     gestaltAppleEventsPresent    = 0;                            { True if Apple Events present }
  165.     gestaltScriptingSupport        = 1;
  166.     gestaltOSLInSystem            = 2;                            { OSL is in system so don’t use the one linked in to app }
  167.  
  168.     gestaltFinderAttr            = 'fndr';                        { Finder attributes }
  169.     gestaltFinderDropEvent        = 0;                            { Finder recognizes drop event }
  170.     gestaltFinderMagicPlacement    = 1;                            { Finder supports magic icon placement }
  171.     gestaltFinderCallsAEProcess    = 2;                            { Finder calls AEProcessAppleEvent }
  172.     gestaltOSLCompliantFinder    = 3;                            { Finder is scriptable and recordable }
  173.     gestaltFinderSupports4GBVolumes = 4;                        { Finder correctly handles 4GB volumes }
  174.     gestaltFinderHasClippings    = 6;                            { Finder supports Drag Manager clipping files }
  175.  
  176.     gestaltFindFolderAttr        = 'fold';                        { Folder Mgr attributes }
  177.     gestaltFindFolderPresent    = 0;                            { True if Folder Mgr present }
  178.  
  179.     gestaltFontMgrAttr            = 'font';                        { Font Mgr attributes }
  180.     gestaltOutlineFonts            = 0;                            { True if Outline Fonts supported }
  181.  
  182.     gestaltFPUType                = 'fpu ';                        { fpu type }
  183.     gestaltNoFPU                = 0;                            { no FPU }
  184.     gestalt68881                = 1;                            { 68881 FPU }
  185.     gestalt68882                = 2;                            { 68882 FPU }
  186.     gestalt68040FPU                = 3;                            { 68040 built-in FPU }
  187.  
  188.     gestaltFSAttr                = 'fs  ';                        { file system attributes }
  189.     gestaltFullExtFSDispatching    = 0;                            { has really cool new HFSDispatch dispatcher }
  190.     gestaltHasFSSpecCalls        = 1;                            { has FSSpec calls }
  191.     gestaltHasFileSystemManager    = 2;                            { has a file system manager }
  192.     gestaltFSMDoesDynamicLoad    = 3;                            { file system manager supports dynamic loading }
  193.     gestaltFSSupports4GBVols    = 4;                            { file system supports 4 gigabyte volumes }
  194.     gestaltFSSupports2TBVols    = 5;                            { file system supports 2 terabyte volumes }
  195.     gestaltHasExtendedDiskInit    = 6;                            { has extended Disk Initialization calls }
  196.  
  197. {$IFC NOT OLDROUTINELOCATIONS }
  198.     gestaltFSMVersion            = 'fsm ';
  199.  
  200. {$ENDC}
  201.     gestaltFXfrMgrAttr            = 'fxfr';                        { file transfer manager attributes }
  202.     gestaltFXfrMgrPresent        = 0;
  203.     gestaltFXfrMgrMultiFile        = 1;                            { supports FTSend and FTReceive }
  204.     gestaltFXfrMgrErrorString    = 2;                            { supports FTGetErrorString }
  205.  
  206.     gestaltGraphicsAttr            = 'gfxa';                        { Quickdraw GX attributes selector }
  207.     gestaltGraphicsIsDebugging    = $00000001;
  208.     gestaltGraphicsIsLoaded        = $00000002;
  209.     gestaltGraphicsIsPowerPC    = $00000004;
  210.  
  211.     gestaltGraphicsVersion        = 'grfx';                        { Quickdraw GX version selector }
  212.     gestaltCurrentGraphicsVersion = $00010000;                    { the version described in this set of headers }
  213.  
  214.     gestaltHardwareAttr            = 'hdwr';                        { hardware attributes }
  215.     gestaltHasVIA1                = 0;                            { VIA1 exists }
  216.     gestaltHasVIA2                = 1;                            { VIA2 exists }
  217.     gestaltHasASC                = 3;                            { Apple Sound Chip exists }
  218.     gestaltHasSCC                = 4;                            { SCC exists }
  219.     gestaltHasSCSI                = 7;                            { SCSI exists }
  220.     gestaltHasSoftPowerOff        = 19;                            { Capable of software power off }
  221.     gestaltHasSCSI961            = 21;                            { 53C96 SCSI controller on internal bus }
  222.     gestaltHasSCSI962            = 22;                            { 53C96 SCSI controller on external bus }
  223.     gestaltHasUniversalROM        = 24;                            { Do we have a Universal ROM? }
  224.     gestaltHasEnhancedLtalk        = 30;                            { Do we have Enhanced LocalTalk? }
  225.  
  226.     gestaltHelpMgrAttr            = 'help';                        { Help Mgr Attributes }
  227.     gestaltHelpMgrPresent        = 0;                            { true if help mgr is present }
  228.     gestaltHelpMgrExtensions    = 1;                            { true if help mgr extensions are installed }
  229.  
  230.     gestaltCompressionMgr        = 'icmp';
  231.  
  232.     gestaltIconUtilitiesAttr    = 'icon';                        { Icon Utilities attributes  (Note: available in System 7.0, despite gestalt) }
  233.     gestaltIconUtilitiesPresent    = 0;                            { true if icon utilities are present }
  234.  
  235.     gestaltKeyboardType            = 'kbd ';                        { keyboard type }
  236.     gestaltMacKbd                = 1;
  237.     gestaltMacAndPad            = 2;
  238.     gestaltMacPlusKbd            = 3;
  239.     gestaltExtADBKbd            = 4;
  240.     gestaltStdADBKbd            = 5;
  241.     gestaltPrtblADBKbd            = 6;
  242.     gestaltPrtblISOKbd            = 7;
  243.     gestaltStdISOADBKbd            = 8;
  244.     gestaltExtISOADBKbd            = 9;
  245.     gestaltADBKbdII                = 10;
  246.     gestaltADBISOKbdII            = 11;
  247.     gestaltPwrBookADBKbd        = 12;
  248.     gestaltPwrBookISOADBKbd        = 13;
  249.     gestaltAppleAdjustKeypad    = 14;
  250.     gestaltAppleAdjustADBKbd    = 15;
  251.     gestaltAppleAdjustISOKbd    = 16;
  252.     gestaltJapanAdjustADBKbd    = 17;                            { Japan Adjustable Keyboard }
  253.     gestaltPwrBkExtISOKbd        = 20;                            { PowerBook Extended International Keyboard with function keys }
  254.     gestaltPwrBkExtJISKbd        = 21;                            { PowerBook Extended Japanese Keyboard with function keys         }
  255.     gestaltPwrBkExtADBKbd        = 24;                            { PowerBook Extended Domestic Keyboard with function keys         }
  256.  
  257.     gestaltLowMemorySize        = 'lmem';
  258.  
  259.     gestaltLogicalRAMSize        = 'lram';
  260.  
  261. {
  262.     MACHINE TYPE CONSTANTS NAMING CONVENTION
  263.     
  264.         All future machine type constant names take the following form:
  265.     
  266.             gestalt<lineName><modelNumber>
  267.             
  268.     Line Names
  269.     
  270.         The following table contains the lines currently produced by Apple and the 
  271.         lineName substrings associated with them:
  272.     
  273.             Line                        lineName
  274.             -------------------------    ------------
  275.             Macintosh LC                "MacLC"
  276.             Macintosh Performa            "Performa"
  277.             Macintosh PowerBook            "PowerBook"
  278.             Macintosh PowerBook Duo        "PowerBookDuo"
  279.             Power Macintosh                "PowerMac"
  280.             Apple Workgroup Server        "AWS"
  281.         
  282.         The following table contains lineNames for some discontinued lines:
  283.     
  284.             Line                        lineName
  285.             -------------------------    ------------
  286.             Macintosh Quadra            "MacQuadra" (preferred)
  287.                                         "Quadra" (also used, but not preferred)
  288.             Macintosh Centris            "MacCentris"
  289.     
  290.     Model Numbers
  291.     
  292.         The modelNumber is a string representing the specific model of the machine
  293.         within its particular line.  For example, for the Power Macintosh 8100/80,
  294.         the modelNumber is "8100".
  295.         
  296.         Some Performa & LC model numbers contain variations in the rightmost 1 or 2
  297.         digits to indicate different RAM and Hard Disk configurations.  A single
  298.         machine type is assigned for all variations of a specific model number.  In
  299.         this case, the modelNumber string consists of the constant leftmost part
  300.         of the model number with 0s for the variant digits.  For example, the
  301.         Performa 6115 and Performa 6116 are both return the same machine type
  302.         constant:  gestaltPerforma6100.    
  303.         
  304.         
  305.     OLD NAMING CONVENTIONS
  306.         
  307.     The "Underscore Speed" suffix
  308.         
  309.         In the past, Apple differentiated between machines that had the same model
  310.         number but different speeds.  For example, the Power Macintosh 8100/80 and
  311.         Power Macintosh 8100/100 return different machine type constants.  This is
  312.         why some existing machine type constant names take the form:
  313.     
  314.             gestalt<lineName><modelNumber>_<speed>
  315.     
  316.         e.g.
  317.     
  318.             gestaltPowerMac8100_110
  319.             gestaltPowerMac7100_80
  320.             gestaltPowerMac7100_66
  321.     
  322.         It is no longer necessary to use the "underscore speed" suffix.  Starting with
  323.         the Power Surge machines (Power Macintosh 7200, 7500, 8500 and 9500), speed is
  324.         no longer used to differentiate between machine types.  This is why a Power
  325.         Macintosh 7200/75 and a Power Macintosh 7200/90 return the same machine type
  326.         constant:  gestaltPowerMac7200.
  327.         
  328.     The "Screen Type" suffix
  329.         
  330.         All PowerBook models prior to the PowerBook 190, and all PowerBook Duo models
  331.         before the PowerBook Duo 2300 take the form:
  332.         
  333.             gestalt<lineName><modelNumber><screenType>
  334.         
  335.         Where <screenType> is "c" or the empty string.
  336.         
  337.         e.g.
  338.         
  339.             gestaltPowerBook100
  340.             gestaltPowerBookDuo280
  341.             gestaltPowerBookDuo280c
  342.             gestaltPowerBook180
  343.             gestaltPowerBook180c
  344.         
  345.         Starting with the PowerBook 190 series and the PowerBook Duo 2300 series, machine
  346.         types are no longer differentiated based on screen type.  This is why a PowerBook
  347.         5300cs/100 and a PowerBook 5300c/100 both return the same machine type constant:
  348.         gestaltPowerBook5300.
  349.     
  350.         Macintosh LC 630                gestaltMacLC630
  351.         Macintosh Performa 6200            gestaltPerforma6200
  352.         Macintosh Quadra 700            gestaltQuadra700
  353.         Macintosh PowerBook 5300        gestaltPowerBook5300
  354.         Macintosh PowerBook Duo 2300    gestaltPowerBookDuo2300
  355.         Power Macintosh 8500            gestaltPowerMac8500
  356. }
  357.     gestaltMachineType            = 'mach';                        { machine type }
  358.     gestaltClassic                = 1;
  359.     gestaltMacXL                = 2;
  360.     gestaltMac512KE                = 3;
  361.     gestaltMacPlus                = 4;
  362.     gestaltMacSE                = 5;
  363.     gestaltMacII                = 6;
  364.     gestaltMacIIx                = 7;
  365.     gestaltMacIIcx                = 8;
  366.     gestaltMacSE030                = 9;
  367.     gestaltPortable                = 10;
  368.     gestaltMacIIci                = 11;
  369.     gestaltMacIIfx                = 13;
  370.     gestaltMacClassic            = 17;
  371.     gestaltMacIIsi                = 18;
  372.     gestaltMacLC                = 19;
  373.     gestaltQuadra900            = 20;
  374.     gestaltPowerBook170            = 21;
  375.     gestaltQuadra700            = 22;
  376.     gestaltClassicII            = 23;
  377.     gestaltPowerBook100            = 24;
  378.     gestaltPowerBook140            = 25;
  379.     gestaltQuadra950            = 26;
  380.     gestaltMacLCIII                = 27;
  381.     gestaltPerforma450            = gestaltMacLCIII;
  382.     gestaltPowerBookDuo210        = 29;
  383.     gestaltMacCentris650        = 30;
  384.     gestaltPowerBookDuo230        = 32;
  385.     gestaltPowerBook180            = 33;
  386.     gestaltPowerBook160            = 34;
  387.     gestaltMacQuadra800            = 35;
  388.     gestaltMacQuadra650            = 36;
  389.     gestaltMacLCII                = 37;
  390.     gestaltPowerBookDuo250        = 38;
  391.     gestaltAWS9150_80            = 39;
  392.     gestaltPowerMac8100_110        = 40;
  393.     gestaltAWS8150_110            = gestaltPowerMac8100_110;
  394.     gestaltPowerMac5200            = 41;
  395.     gestaltPowerMac6200            = 42;
  396.     gestaltMacIIvi                = 44;
  397.     gestaltMacIIvm                = 45;
  398.     gestaltPerforma600            = gestaltMacIIvm;
  399.     gestaltPowerMac7100_80        = 47;
  400.     gestaltMacIIvx                = 48;
  401.     gestaltMacColorClassic        = 49;
  402.     gestaltPerforma250            = gestaltMacColorClassic;
  403.     gestaltPowerBook165c        = 50;
  404.     gestaltMacCentris610        = 52;
  405.     gestaltMacQuadra610            = 53;
  406.     gestaltPowerBook145            = 54;
  407.     gestaltPowerMac8100_100        = 55;
  408.     gestaltMacLC520                = 56;
  409.     gestaltAWS9150_120            = 57;
  410.     gestaltMacCentris660AV        = 60;
  411.     gestaltPerforma46x            = 62;
  412.     gestaltPowerMac8100_80        = 65;
  413.     gestaltAWS8150_80            = gestaltPowerMac8100_80;
  414.     gestaltPowerMac9500            = 67;
  415.     gestaltPowerMac7500            = 68;
  416.     gestaltPowerMac8500            = 69;
  417.     gestaltPowerBook180c        = 71;
  418.     gestaltPowerBook520            = 72;
  419.     gestaltPowerBook520c        = 72;
  420.     gestaltPowerBook540            = 72;
  421.     gestaltPowerBook540c        = 72;
  422.     gestaltPowerMac6100_60        = 75;
  423.     gestaltAWS6150_60            = gestaltPowerMac6100_60;
  424.     gestaltPowerBookDuo270c        = 77;
  425.     gestaltMacQuadra840AV        = 78;
  426.     gestaltPerforma550            = 80;
  427.     gestaltPowerBook165            = 84;
  428.     gestaltPowerBook190            = 85;
  429.     gestaltMacTV                = 88;
  430.     gestaltMacLC475                = 89;
  431.     gestaltPerforma47x            = gestaltMacLC475;
  432.     gestaltMacLC575                = 92;
  433.     gestaltMacQuadra605            = 94;
  434.     gestaltQuadra630            = 98;
  435.     gestaltPowerMac6100_66        = 100;
  436.     gestaltAWS6150_66            = gestaltPowerMac6100_66;
  437.     gestaltPowerBookDuo280        = 102;
  438.     gestaltPowerBookDuo280c        = 103;
  439.     gestaltPowerMac7200            = 108;
  440.     gestaltPowerMac7100_66        = 112;                            {  Power Macintosh 7100/66  }
  441.     gestaltPowerBook150            = 115;
  442.     gestaltPowerBookDuo2300        = 124;
  443.     gestaltPowerBook500PPCUpgrade = 126;
  444.     gestaltPowerBook5300        = 128;
  445.  
  446.     kMachineNameStrID            = -16395;
  447.  
  448.     gestaltMachineIcon            = 'micn';
  449.  
  450.     gestaltMiscAttr                = 'misc';                        { miscellaneous attributes }
  451.     gestaltScrollingThrottle    = 0;                            { true if scrolling throttle on }
  452.     gestaltSquareMenuBar        = 2;                            { true if menu bar is square }
  453.  
  454. {
  455.     The name gestaltMixedModeVersion for the 'mixd' selector is semantically incorrect.
  456.     The same selector has been renamed gestaltMixedModeAttr to properly reflect the
  457.     Inside Mac: PowerPC System Software documentation.  The gestaltMixedModeVersion
  458.     symbol has been preserved only for backwards compatibility.
  459.  
  460.     Developers are forewarned that gestaltMixedModeVersion has a limited lifespan and
  461.     will be removed in a future release of the Interfaces.
  462.  
  463.     For the first version of Mixed Mode, both meanings of the 'mixd' selector are
  464.     functionally identical.  They both return 0x00000001.  In subsequent versions
  465.     of Mixed Mode, however, the 'mixd' selector will not respond with an increasing
  466.     version number, but rather, with 32 attribute bits with various meanings.
  467. }
  468.     gestaltMixedModeVersion        = 'mixd';
  469.  
  470.     gestaltMixedModeAttr        = 'mixd';                        { returns Mixed Mode attributes }
  471.     gestaltMixedModePowerPC        = 0;                            {  true if Mixed Mode supports PowerPC ABI calling conventions  }
  472.     gestaltPowerPCAware            = 0;                            {  old name for gestaltMixedModePowerPC  }
  473.     gestaltMixedModeCFM68K        = 1;                            {  true if Mixed Mode supports CFM-68K calling conventions  }
  474.     gestaltMixedModeCFM68KHasTrap = 2;                            {  true if CFM-68K Mixed Mode implements _MixedModeDispatch (versions 1.0.1 and prior did not)  }
  475.  
  476.     gestaltMMUType                = 'mmu ';                        { mmu type }
  477.     gestaltNoMMU                = 0;                            { no MMU }
  478.     gestaltAMU                    = 1;                            { address management unit }
  479.     gestalt68851                = 2;                            { 68851 PMMU }
  480.     gestalt68030MMU                = 3;                            { 68030 built-in MMU }
  481.     gestalt68040MMU                = 4;                            { 68040 built-in MMU }
  482.     gestaltEMMU1                = 5;                            { Emulated MMU type 1  }
  483.  
  484.     gestaltStdNBPAttr            = 'nlup';                        { standard nbp attributes }
  485.     gestaltStdNBPPresent        = 0;
  486.  
  487.     gestaltNotificationMgrAttr    = 'nmgr';                        { notification manager attributes }
  488.     gestaltNotificationPresent    = 0;                            { notification manager exists }
  489.  
  490.     gestaltNameRegistryVersion    = 'nreg';
  491.  
  492.     gestaltNuBusSlotCount        = 'nubs';
  493.  
  494.     gestaltOpenFirmwareInfo        = 'opfw';
  495.  
  496.     gestaltOSAttr                = 'os  ';                        { o/s attributes }
  497.     gestaltSysZoneGrowable        = 0;                            { system heap is growable }
  498.     gestaltLaunchCanReturn        = 1;                            { can return from launch }
  499.     gestaltLaunchFullFileSpec    = 2;                            { can launch from full file spec }
  500.     gestaltLaunchControl        = 3;                            { launch control support available }
  501.     gestaltTempMemSupport        = 4;                            { temp memory support }
  502.     gestaltRealTempMemory        = 5;                            { temp memory handles are real }
  503.     gestaltTempMemTracked        = 6;                            { temporary memory handles are tracked }
  504.     gestaltIPCSupport            = 7;                            { IPC support is present }
  505.     gestaltSysDebuggerSupport    = 8;                            { system debugger support is present }
  506.  
  507.     gestaltOSTable                = 'ostt';
  508.  
  509.     gestaltPCXAttr                = 'pcxg';                        { PC Exchange attributes }
  510.     gestaltPCXHas8and16BitFAT    = 0;                            { PC Exchange supports both 8 and 16 bit FATs }
  511.     gestaltPCXHasProDOS            = 1;                            { PC Exchange supports ProDOS }
  512.  
  513.     gestaltLogicalPageSize        = 'pgsz';
  514.  
  515.     gestaltPopupAttr            = 'pop!';                        { popup cdef attributes }
  516.     gestaltPopupPresent            = 0;
  517.  
  518.     gestaltPowerMgrAttr            = 'powr';                        { power manager attributes }
  519.     gestaltPMgrExists            = 0;
  520.     gestaltPMgrCPUIdle            = 1;
  521.     gestaltPMgrSCC                = 2;
  522.     gestaltPMgrSound            = 3;
  523.     gestaltPMgrDispatchExists    = 4;
  524.  
  525. {
  526.  * PPC will return the combination of following bit fields.
  527.  * e.g. gestaltPPCSupportsRealTime +gestaltPPCSupportsIncoming + gestaltPPCSupportsOutGoing
  528.  * indicates PPC is cuurently is only supports real time delivery
  529.  * and both incoming and outgoing network sessions are allowed.
  530.  * By default local real time delivery is supported as long as PPCInit has been called.}
  531.     gestaltPPCToolboxAttr        = 'ppc ';                        { PPC toolbox attributes }
  532.     gestaltPPCToolboxPresent    = $0000;                        { PPC Toolbox is present  Requires PPCInit to be called }
  533.     gestaltPPCSupportsRealTime    = $1000;                        { PPC Supports real-time delivery }
  534.     gestaltPPCSupportsIncoming    = $0001;                        { PPC will deny incoming network requests }
  535.     gestaltPPCSupportsOutGoing    = $0002;                        { PPC will deny outgoing network requests }
  536.  
  537.     gestaltProcessorType        = 'proc';                        { processor type }
  538.     gestalt68000                = 1;
  539.     gestalt68010                = 2;
  540.     gestalt68020                = 3;
  541.     gestalt68030                = 4;
  542.     gestalt68040                = 5;
  543.  
  544.     gestaltParityAttr            = 'prty';                        { parity attributes }
  545.     gestaltHasParityCapability    = 0;                            { has ability to check parity }
  546.     gestaltParityEnabled        = 1;                            { parity checking enabled }
  547.  
  548.     gestaltQuickdrawVersion        = 'qd  ';                        { quickdraw version }
  549.     gestaltOriginalQD            = $000;                            { original 1-bit QD }
  550.     gestalt8BitQD                = $100;                            { 8-bit color QD }
  551.     gestalt32BitQD                = $200;                            { 32-bit color QD }
  552.     gestalt32BitQD11            = $201;                            { 32-bit color QDv1.1 }
  553.     gestalt32BitQD12            = $220;                            { 32-bit color QDv1.2 }
  554.     gestalt32BitQD13            = $230;                            { 32-bit color QDv1.3 }
  555.  
  556.     gestaltQuickdrawFeatures    = 'qdrw';                        { quickdraw features }
  557.     gestaltHasColor                = 0;                            { color quickdraw present }
  558.     gestaltHasDeepGWorlds        = 1;                            { GWorlds can be deeper than 1-bit }
  559.     gestaltHasDirectPixMaps        = 2;                            { PixMaps can be direct (16 or 32 bit) }
  560.     gestaltHasGrayishTextOr        = 3;                            { supports text mode grayishTextOr }
  561.     gestaltSupportsMirroring    = 4;                            { Supports video mirroring via the Display Manager. }
  562.  
  563.     gestaltQuickTimeVersion        = 'qtim';                        { returns version of QuickTime }
  564.     gestaltQuickTime            = 'qtim';
  565.  
  566.     gestaltQuickTimeFeatures    = 'qtrs';
  567.     gestaltPPCQuickTimeLibPresent = 0;                            { PowerPC QuickTime glue library is present }
  568.  
  569.     gestaltPhysicalRAMSize        = 'ram ';
  570.  
  571.     gestaltRBVAddr                = 'rbv ';
  572.  
  573.     gestaltROMSize                = 'rom ';
  574.  
  575.     gestaltROMVersion            = 'romv';
  576.  
  577.     gestaltResourceMgrAttr        = 'rsrc';                        { Resource Mgr attributes }
  578.     gestaltPartialRsrcs            = 0;                            { True if partial resources exist }
  579.  
  580.     gestaltRealtimeMgrAttr        = 'rtmr';                        { Realtime manager attributes            }
  581.     gestaltRealtimeMgrPresent    = 0;                            { true if the Realtime manager is present     }
  582.  
  583.     gestaltSCCReadAddr            = 'sccr';
  584.  
  585.     gestaltSCCWriteAddr            = 'sccw';
  586.  
  587.     gestaltScrapMgrAttr            = 'scra';                        { Scrap Manager attributes }
  588.     gestaltScrapMgrTranslationAware = 0;                        { True if scrap manager is translation aware }
  589.  
  590.     gestaltScriptMgrVersion        = 'scri';
  591.  
  592.     gestaltScriptCount            = 'scr#';
  593.  
  594.     gestaltSCSI                    = 'scsi';                        { SCSI Manager attributes }
  595.     gestaltAsyncSCSI            = 0;                            { Supports Asynchronous SCSI }
  596.     gestaltAsyncSCSIINROM        = 1;                            { Async scsi is in ROM (available for booting) }
  597.     gestaltSCSISlotBoot            = 2;                            { ROM supports Slot-style PRAM for SCSI boots (PDM and later) }
  598.  
  599.     gestaltControlStripAttr        = 'sdev';                        { Control Strip attributes }
  600.     gestaltControlStripExists    = 0;                            { Control Strip is installed }
  601.     gestaltControlStripVersionFixed = 1;                        { Control Strip version Gestalt selector was fixed }
  602.     gestaltControlStripUserFont    = 2;                            { supports user-selectable font/size }
  603.     gestaltControlStripUserHotKey = 3;                            { support user-selectable hot key to show/hide the window }
  604.  
  605.     gestaltSerialAttr            = 'ser ';                        { Serial attributes }
  606.     gestaltHasGPIaToDCDa        = 0;                            { GPIa connected to DCDa}
  607.     gestaltHasGPIaToRTxCa        = 1;                            { GPIa connected to RTxCa clock input}
  608.     gestaltHasGPIbToDCDb        = 2;                            { GPIb connected to DCDb }
  609.  
  610.     gestaltNuBusConnectors        = 'sltc';
  611.  
  612.     gestaltSlotAttr                = 'slot';                        { slot attributes  }
  613.     gestaltSlotMgrExists        = 0;                            { true is slot mgr exists  }
  614.     gestaltNuBusPresent            = 1;                            { NuBus slots are present  }
  615.     gestaltSESlotPresent        = 2;                            { SE PDS slot present  }
  616.     gestaltSE30SlotPresent        = 3;                            { SE/30 slot present  }
  617.     gestaltPortableSlotPresent    = 4;                            { Portable’s slot present  }
  618.  
  619.     gestaltFirstSlotNumber        = 'slt1';
  620.  
  621.     gestaltSoundAttr            = 'snd ';                        { sound attributes }
  622.     gestaltStereoCapability        = 0;                            { sound hardware has stereo capability }
  623.     gestaltStereoMixing            = 1;                            { stereo mixing on external speaker }
  624.     gestaltSoundIOMgrPresent    = 3;                            { The Sound I/O Manager is present }
  625.     gestaltBuiltInSoundInput    = 4;                            { built-in Sound Input hardware is present }
  626.     gestaltHasSoundInputDevice    = 5;                            { Sound Input device available }
  627.     gestaltPlayAndRecord        = 6;                            { built-in hardware can play and record simultaneously }
  628.     gestalt16BitSoundIO            = 7;                            { sound hardware can play and record 16-bit samples }
  629.     gestaltStereoInput            = 8;                            { sound hardware can record stereo }
  630.     gestaltLineLevelInput        = 9;                            { sound input port requires line level }
  631. { the following bits are not defined prior to Sound Mgr 3.0 }
  632.     gestaltSndPlayDoubleBuffer    = 10;                            { SndPlayDoubleBuffer available, set by Sound Mgr 3.0 and later }
  633.     gestaltMultiChannels        = 11;                            { multiple channel support, set by Sound Mgr 3.0 and later }
  634.     gestalt16BitAudioSupport    = 12;                            { 16 bit audio data supported, set by Sound Mgr 3.0 and later }
  635.  
  636.     gestaltStandardFileAttr        = 'stdf';                        { Standard File attributes }
  637.     gestaltStandardFile58        = 0;                            { True if selectors 5-8 (StandardPutFile-CustomGetFile) are supported }
  638.     gestaltStandardFileTranslationAware = 1;                    { True if standard file is translation manager aware }
  639.     gestaltStandardFileHasColorIcons = 2;                        { True if standard file has 16x16 color icons }
  640.     gestaltStandardFileUseGenericIcons = 3;                        { Standard file LDEF to use only the system generic icons if true }
  641.     gestaltStandardFileHasDynamicVolumeAllocation = 4;            { True if standard file supports more than 20 volumes }
  642.  
  643.     gestaltSysArchitecture        = 'sysa';                        { Native System Architecture }
  644.     gestalt68k                    = 1;                            { Motorola MC68k architecture }
  645.     gestaltPowerPC                = 2;                            { IBM PowerPC architecture }
  646.  
  647.     gestaltSystemVersion        = 'sysv';
  648.  
  649.     gestaltTSMgrVersion            = 'tsmv';                        { Text Services Mgr version, if present }
  650.     gestaltTSMgr2                = $200;
  651.  
  652.     gestaltTSMgrAttr            = 'tsma';                        { Text Services Mgr attributes, if present }
  653.     gestaltTSMDisplayMgrAwareBit = 0;                            { TSM knows about display manager }
  654.     gestaltTSMdoesTSMTEBit        = 1;                            { TSM has integrated TSMTE }
  655.  
  656.     gestaltTSMTEVersion            = 'tmTV';
  657.     gestaltTSMTE1                = $100;
  658.     gestaltTSMTE2                = $200;
  659.  
  660.     gestaltTSMTEAttr            = 'tmTE';
  661.     gestaltTSMTEPresent            = 0;
  662.     gestaltTSMTE                = 0;                            { gestaltTSMTE is old name for gestaltTSMTEPresent }
  663.  
  664.     gestaltTextEditVersion        = 'te  ';                        { TextEdit version number }
  665.     gestaltTE1                    = 1;                            { TextEdit in MacIIci ROM }
  666.     gestaltTE2                    = 2;                            { TextEdit with 6.0.4 Script Systems on MacIIci (Script bug fixes for MacIIci) }
  667.     gestaltTE3                    = 3;                            { TextEdit with 6.0.4 Script Systems all but MacIIci }
  668.     gestaltTE4                    = 4;                            { TextEdit in System 7.0 }
  669.     gestaltTE5                    = 5;                            { TextWidthHook available in TextEdit }
  670.     gestaltTE6                    = 6;                            { TextEdit in System 8.0 }
  671.  
  672.     gestaltTEAttr                = 'teat';                        { TextEdit attributes }
  673.     gestaltTEHasGetHiliteRgn    = 0;                            { TextEdit has TEGetHiliteRgn }
  674.     gestaltTESupportsInlineInput = 1;                            { TextEdit does Inline Input }
  675.     gestaltTESupportsTextObjects = 2;                            { TextEdit does Text Objects }
  676.  
  677.     gestaltTeleMgrAttr            = 'tele';                        { Telephone manager attributes }
  678.     gestaltTeleMgrPresent        = 0;
  679.     gestaltTeleMgrPowerPCSupport = 1;
  680.     gestaltTeleMgrSoundStreams    = 2;
  681.     gestaltTeleMgrAutoAnswer    = 3;
  682.     gestaltTeleMgrIndHandset    = 4;
  683.     gestaltTeleMgrSilenceDetect    = 5;
  684.     gestaltTeleMgrNewTELNewSupport = 6;
  685.  
  686.     gestaltTermMgrAttr            = 'term';                        { terminal mgr attributes }
  687.     gestaltTermMgrPresent        = 0;
  688.     gestaltTermMgrErrorString    = 2;
  689.  
  690.     gestaltTimeMgrVersion        = 'tmgr';                        { time mgr version }
  691.     gestaltStandardTimeMgr        = 1;                            { standard time mgr is present }
  692.     gestaltRevisedTimeMgr        = 2;                            { revised time mgr is present }
  693.     gestaltExtendedTimeMgr        = 3;                            { extended time mgr is present }
  694.  
  695.     gestaltSpeechAttr            = 'ttsc';                        { Speech Manager attributes }
  696.     gestaltSpeechMgrPresent        = 0;                            { bit set indicates that Speech Manager exists }
  697.     gestaltSpeechHasPPCGlue        = 1;                            { bit set indicates that native PPC glue for Speech Manager API exists }
  698.  
  699.     gestaltToolboxTable            = 'tbtt';
  700.  
  701.     gestaltThreadMgrAttr        = 'thds';                        { Thread Manager attributes }
  702.     gestaltThreadMgrPresent        = 0;                            { bit true if Thread Mgr is present }
  703.     gestaltSpecificMatchSupport    = 1;                            { bit true if Thread Mgr supports exact match creation option }
  704.     gestaltThreadsLibraryPresent = 2;                            { bit true if Thread Mgr shared library is present }
  705.  
  706.     gestaltTVAttr                = 'tv  ';                        { TV version                                        <EX16>     }
  707.     gestaltHasTVTuner            = 0;                            { supports Philips FL1236F video tuner                <EX16>     }
  708.     gestaltHasSoundFader        = 1;                            { supports Philips TEA6330 Sound Fader chip        <EX16>     }
  709.     gestaltHasHWClosedCaptioning = 2;                            { supports Philips SAA5252 Closed Captioning        <EX16>     }
  710.     gestaltHasIRRemote            = 3;                            { supports CyclopsII Infra Red Remote control        <EX16>     }
  711.     gestaltHasVidDecoderScaler    = 4;                            { supports Philips SAA7194 Video Decoder/Scaler    <EX16>     }
  712.     gestaltHasStereoDecoder        = 5;                            { supports Sony SBX1637A-01 stereo decoder            <EX16>     }
  713.  
  714.     gestaltVersion                = 'vers';                        { gestalt version }
  715.     gestaltValueImplementedVers    = 5;                            { version of gestalt where gestaltValue is implemented. }
  716.  
  717.     gestaltVIA1Addr                = 'via1';
  718.  
  719.     gestaltVIA2Addr                = 'via2';
  720.  
  721.     gestaltVMAttr                = 'vm  ';                        { virtual memory attributes }
  722.     gestaltVMPresent            = 0;                            { true if virtual memory is present }
  723.  
  724.     gestaltTranslationAttr        = 'xlat';                        { Translation Manager attributes }
  725.     gestaltTranslationMgrExists    = 0;                            { True if translation manager exists }
  726.     gestaltTranslationMgrHintOrder = 1;                            { True if hint order reversal in effect }
  727.     gestaltTranslationPPCAvail    = 2;
  728.     gestaltTranslationGetPathAPIAvail = 3;
  729.  
  730.     gestaltExtToolboxTable        = 'xttt';
  731.  
  732. TYPE
  733.     SelectorFunctionProcPtr = ProcPtr;  { FUNCTION SelectorFunction(selector: OSType; VAR response: LONGINT): OSErr; }
  734.     SelectorFunctionUPP = UniversalProcPtr;
  735.  
  736. CONST
  737.     uppSelectorFunctionProcInfo = $000003E0; { FUNCTION (4 byte param, 4 byte param): 2 byte result; }
  738.  
  739. FUNCTION NewSelectorFunctionProc(userRoutine: SelectorFunctionProcPtr): SelectorFunctionUPP;
  740.     {$IFC NOT GENERATINGCFM }
  741.     INLINE $2E9F;
  742.     {$ENDC}
  743.  
  744. FUNCTION CallSelectorFunctionProc(selector: OSType; VAR response: LONGINT; userRoutine: SelectorFunctionUPP): OSErr;
  745.     {$IFC NOT GENERATINGCFM}
  746.     INLINE $205F, $4E90;
  747.     {$ENDC}
  748. {$IFC SystemSevenOrLater }
  749.  
  750. FUNCTION Gestalt(selector: OSType; VAR response: LONGINT): OSErr;
  751.     {$IFC NOT GENERATINGCFM}
  752.     INLINE $225F, $201F, $A1AD, $2288, $3E80;
  753.     {$ENDC}
  754. FUNCTION ReplaceGestalt(selector: OSType; gestaltFunction: SelectorFunctionUPP; VAR oldGestaltFunction: SelectorFunctionUPP): OSErr;
  755.     {$IFC NOT GENERATINGCFM}
  756.     INLINE $225F, $205F, $201F, $2F09, $A5AD, $225F, $2288, $3E80;
  757.     {$ENDC}
  758. FUNCTION NewGestalt(selector: OSType; gestaltFunction: SelectorFunctionUPP): OSErr;
  759.     {$IFC NOT GENERATINGCFM}
  760.     INLINE $205F, $201F, $A3AD, $3E80;
  761.     {$ENDC}
  762. {$ELSEC}
  763.  
  764. FUNCTION Gestalt(selector: OSType; VAR response: LONGINT): OSErr;
  765. FUNCTION NewGestalt(selector: OSType; gestaltFunction: SelectorFunctionUPP): OSErr;
  766. FUNCTION ReplaceGestalt(selector: OSType; gestaltFunction: SelectorFunctionUPP; VAR oldGestaltFunction: SelectorFunctionUPP): OSErr;
  767. {$ENDC}
  768. {$IFC SystemSevenFiveOrLater }
  769. { These functions are built into System 7.5, but not on earlier systems }
  770. FUNCTION NewGestaltValue(selector: OSType; newValue: LONGINT): OSErr;
  771.     {$IFC NOT GENERATINGCFM}
  772.     INLINE $303C, $0401, $ABF1;
  773.     {$ENDC}
  774. FUNCTION ReplaceGestaltValue(selector: OSType; replacementValue: LONGINT): OSErr;
  775.     {$IFC NOT GENERATINGCFM}
  776.     INLINE $303C, $0402, $ABF1;
  777.     {$ENDC}
  778. FUNCTION SetGestaltValue(selector: OSType; newValue: LONGINT): OSErr;
  779.     {$IFC NOT GENERATINGCFM}
  780.     INLINE $303C, $0404, $ABF1;
  781.     {$ENDC}
  782. FUNCTION DeleteGestaltValue(selector: OSType): OSErr;
  783.     {$IFC NOT GENERATINGCFM}
  784.     INLINE $303C, $0203, $ABF1;
  785.     {$ENDC}
  786. {$ELSEC}
  787. {$ENDC}
  788.  
  789. {$ALIGN RESET}
  790. {$POP}
  791.  
  792. {$SETC UsingIncludes := GestaltEquIncludes}
  793.  
  794. {$ENDC} {__GESTALTEQU__}
  795.  
  796. {$IFC NOT UsingIncludes}
  797.  END.
  798. {$ENDC}
  799.